home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
basic
/
msc.zip
/
TRYMSC.BAS
< prev
next >
Wrap
BASIC Source File
|
1992-04-23
|
5KB
|
88 lines
'$INCLUDE: 'casekey.bi'
'
' ========================================================
' | MSC Interactive Program (c) |
' | |
' | |
' | |
' | Make sure MSC.QLB has been loaded before you run |
' | this program. |
' | Make sure all files are in the same directory and |
' | you are in that directory the files are in. |
' | |
' | To load MSC type at command prompt: QB /L MSC.QLB |
' | |
' | When you run this program it will make a backup, |
' | Save it incase you loose this one. |
' | |
' | MSC is an aid to fast devlopment of Select case's |
' | for QuickBASIC, For other fast interactive Programs |
' | Just Register and you'll recieve MIE which makes |
' | IF ELSEIF END IF's in a flash, also I'll send you |
' | a program that makes Complete Graphic screens and |
' | text just by working the keyboard, You can visualy |
' | see what your doing wile making it. |
' | |
' | If you like MSC you'll like the complete package! |
' | This one is for traping Scan Codes from the inkey |
' | function, The registered version provides a lot |
' | different options like trappimg for CHR$(), |
' | Numeric and others. |
' | |
' | Make sure you have loaded MSC.QLB, you can load it |
' | by using this command line: QB /L MSC.QLB, if your |
' | working with the /cmd option, it must allways be |
' | the last option of the command line. |
' | |
' | Be sure to include the MSC.BI with the '$INCLUDE, |
' | and that all files are in the same directory. |
' | |
' | MSC use's the file called CASEKEY.DAT. |
' | |
' | To Use MSC just save your program in text, pass it |
' | the name of your program by calling it as shown in |
' | this TRYMSC.BAS example, you can pass your program |
' | Name in Quotes or by a STRING ($). |
' | |
' | MSC will allways prompt you and ask if you want to |
' | Continue, MSC will allways make a backup of the |
' | program you pass to it just to be safe incase you |
' | have pressed 'Y' and allowed MSC to Insert. |
' | |
' | After you have pressed 'Y' then press a valid key |
' | or valid key combination ( see the File VALIDKEY ) |
' | for the key strokes traped by the inkeys. |
' | |
' | For Example: while holding Ctrl key down press F1, |
' | this will tell MSC to insert Ctrl-F1 combination. |
' | |
' | MSC allways Inserts the scancode for Escape Key, |
' | and the Enter Key. |
' | |
' | You can use the Escape key to Cancel. |
' | When your done just press enter and MSC will do |
' | rest. |
' | |
' | MSC can insert as big of a select case you need, it |
' | can lso make seperate case statements too, to do |
' | that just run MSC one at a time then when it says |
' | Done.. remove the top REM statements, save your |
' | program in text again and run the program again. |
' | MSC will insert another case statement under the |
' | one you just made. |
' | |
' | Please register!, and Happy Programming! |
' | Scott R. |
' | |
' -------------------------------------------------------
'Call MSC and pass this programs name(the program your in), that all!
CALL MSC("trymsc.bas")
END